home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
daten
/
xmgr
/
examples
/
tmc.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-02-05
|
2KB
|
67 lines
/*
* test of -pipe option
*/
#include <stdio.h>
#include <math.h>
#ifndef M_PI
#define M_PI 3.14
#endif
main(argc, argv)
int argc;
char **argv;
{
int i, j;
double x, y, t, dt;
for (j = 20; j > 0; j--) {
/*
* write out a set
*/
for (i = 0; i < 101; i++) {
t = 8.0 * i / (1.0 * j) * M_PI;
printf("%d %lf\n", i, cos(t) + sin(2.0 * t) + cos(t / 2.0) + sin(4 * t) + cos(t / 4.0));
}
printf("&\n"); /* end of set marker */
/*
* if this is the first set (j == 10) then autoscale.
*/
if (j == 20) {
printf("@view 0.1, 0.1, 0.9, 0.4\n"); /* set the viewport for this graph */
printf("@with g1\n"); /* reset the current graph to graph 1 */
printf("@view 0.1, 0.5, 0.9, 0.9\n"); /* set the viewport for graph 1 */
printf("@with g0\n"); /* reset the current graph to graph 0 */
printf("@autoscale\n"); /* autoscale the first time through */
printf("@focus off\n"); /* turn of the focus markers (annoying) */
printf("@dft(s0, 2)\n"); /* compute the spectrum of the first set */
printf("@move g0.s1 to g1.s0\n"); /* move the computed spectrum to graph 1 */
printf("@with g1\n"); /* set the focus on graph 1 */
printf("@autoscale\n"); /* autoscale graph 1 */
printf("@subtitle \"Spectrum\"\n"); /* set the subtitle */
printf("@with g0\n"); /* reset the current graph to graph 0 */
printf("@subtitle \"Data %d\"\n", j);/* set the subtitle for graph 0 */
printf("@kill s0\n"); /* don't need it so kill it (data will be read into
this set */
printf("@sleep 2\n");
}
/*
* else just redraw the plot
*/
else {
printf("@dft(s0, 2)\n"); /* spectrum */
printf("@move g0.s1 to g1.s0\n"); /* move it to graph 1 */
printf("@subtitle \"Data %d\"\n", j);/* set the subtitle for graph 0 */
printf("@redraw\n"); /* redraw the graph with the same scaling limits */
printf("@kill s0\n"); /* kill set 0 in graph 0 */
printf("@with g1\n"); /* switch to graph 1 */
printf("@kill s0\n"); /* kill set 0 in graph 1 */
printf("@with g0\n"); /* reset the current graph to graph 0 */
printf("@sleep 1\n"); /* let the graph sit for a sec */
} /* end if-else */
} /* end for */
}